(custom-make-dependencies): Don't give up

on a whole file, the first time eval gets an error.

diff --git a/lisp/cus-dep.el b/lisp/cus-dep.el
index 286d4830fa873d95ca20aa07f643746043e76f91..006197aa3ab1fa2a61739730d511f2dfc66b358b 100644 (file)
--- a/lisp/cus-dep.el
+++ b/lisp/cus-dep.el
@@ -56,8 +56,11 @@ Usage: emacs -batch -l ./cus-dep.el -f custom-make-dependencies DIRS"
                                            nil t)
                    (beginning-of-line)
                    (let ((expr (read (current-buffer))))
-                     (eval expr)
-                     (put (nth 1 expr) 'custom-where name)))
+                     (condition-case nil
+                         (progn
+                           (eval expr)
+                           (put (nth 1 expr) 'custom-where name))
+                       (error nil))))
                (error nil)))))
        (setq all-subdirs (cdr all-subdirs)))))
   (message "Generating cus-load.el...")